How Would You Survive?/How Would You Survive (1995)(Grolier)[Mac-PC].iso/pc/shared.dir/01961_Script_Aztec Map

Text File | 1995-09-13 | 3KB | 148 lines

on AMapRollover
  quadrantrollover
  if rollover(15) then
    HandCursor
  else
    if rollover(41) then
      HandCursor
    else
      if rollover(42) then
        Handcursor
      else
        ArrowCursor
      end if
    end if
  end if
end

on AMap1Rollover
  quadrantrollover
  if rollover(8) then
    AztecCursor
  else
    if rollover(9) then
      AztecCursor
    else
      if rollover(10) then
        AztecCursor
      else
        if rollover(11) then
          AztecCursor
        else
          if rollover(15) then
            AztecCursor
          else
            ArrowCursor
          end if
        end if
      end if
    end if
  end if
end

on AMap2Rollover
  quadrantrollover
  if rollover(8) then
    AztecCursor
  else
    if rollover(9) then
      AztecCursor
    else
      if rollover(15) then
        AztecCursor
      else
        ArrowCursor
      end if
    end if
  end if
end

on AMap3Rollover
  quadrantrollover
  if the mousecast = the castnum of sprite 8 then
    AztecCursor
  else
    if rollover(9) then
      AztecCursor
    else
      if rollover(10) then
        AztecCursor
      else
        if rollover(15) then
          AztecCursor
        else
          ArrowCursor
        end if
      end if
    end if
  end if
end

on ResetAMaps
  set the castnum of sprite 6 = the number of cast "PA080400.pic"
  set the locH of sprite 16 = 900
  puppetsprite 16, false
  set the locH of sprite 12 = 1000
  puppetsprite 12, false
  go "MapX"
end

on quadrantrollover
  repeat while rollover(6)
    AztecCursor
    if the mouseH > 61 and the MouseH < 124 then
      if the mouseV > 324 and the mouseV < 370 then
        set the castnum of sprite 6 = the number of cast "PA080400.pic"
        updatestage
        if (the mousedown) then
          puppetsprite 2, false
          puppetsprite 12, false
          puppetsprite 16, false
          go "Map1"
          abort
        end if
      end if
    else
      if the mouseH > 78 and the MouseH < 133 then
        if the mouseV > 347 and the mouseV < 390 then
          set the castnum of sprite 6 = the number of cast "PA080500.pic"
          updatestage
          if (the mousedown) then
            puppetsprite 2, false
            puppetsprite 12, false
            puppetsprite 16, false
            go "map2"
            abort
          end if
        end if
      else
        if the mouseH > 124 and the MouseH < 185 then
          if the mouseV > 335 and the mouseV < 369 then
            set the castnum of sprite 6 = the number of cast "PA080600.pic"
            updatestage
            if (the mousedown) then
              puppetsprite 2, false
              puppetsprite 12, false
              puppetsprite 16, false
              go "map3"
              abort
            end if
          else
            if the mouseV > 369 and the MouseV < 405 then
              set the castnum of sprite 6 = the number of cast "PA080700.pic"
              updatestage
              if (the mousedown) then
                puppetsprite 2, false
                puppetsprite 12, false
                puppetsprite 16, false
                go "map4"
                abort
              end if
            end if
          end if
        end if
      end if
    end if
  end repeat
end